{-# LANGUAGE TransformListComp #-}

baz' xs ys =
  [ ( x,
      y
    )
  | x <- xs,
    y <- ys,
    then group using
      -- First comment
      permutations -- Second comment
  ]
